Top 10k strings from Complete Machine Code Package (1988)(Roybot).dsk in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [DSK] (TOSEC-v2007-01-01) /

Back to the directory listing

  34 Track-Info
   3 "t:ass.bin"
   3 "a:ass.bin"
   3  ROYBOT 1987";
   2 ival>65535
   2 d$(a)=b$(e):
   2 d$(a)=b$(a):
   2 c$(row,col-3
   2 ad;"    ";lm;
   2 a;m$(j+a):
   2 "m:ass.bin"
   2 "defc """;:
   2 "a:ass.bas"
   1 ~#Track-Info
   1 yj=jval-12
   1 y$="    0 CANCEL   1 COPY" 
   1 y$(b)="NO"
   1 y$(a)="YES"
   1 x$="   No illegal copying please   "
   1 x$="    No illegal copying please   "
   1 vout=vars-124
   1 vin=vars-61
   1 test=33641
   1 sy+d)=y$(y(yj)):
   1 scode=45000
   1 r$="Go to main menu"
   1 p=kk*kk-kk+1
   1 onbp=33633
   1 o$;q$;" "; ad;" ";:
   1 o$;q$;" ";
   1 ns=y(b)-a:
   1 nop;ld bc,NN;ld (bc),a;inc bc;inc b;dec b;ld b,N;rlca;ex af,af';add hl,bc;ld a,(bc);dec bc;inc c;dec c;ld c,N;rrca;djnz DIS;ld de,NN;ld (de),a;inc de;inc d;dec d;ld d,N;rla;jr DIS;add hl,de;ld a,(de);dec de;inc e;dec e;ld e,N;rra;jr nz,DIS;ld hl,NN;ld (NN),hl;inc hl;inc h;dec h;ld h,N;daa;jr z,DIS;add hl,hl;ld hl,(NN);dec hl;inc l;dec l;ld l,N;cpl;jr nc,DIS;ld sp,NN;ld (NN),a;inc sp;inc (hl);dec (hl);ld (hl),N;scf;jr c,DIS;add hl,sp;ld a,(NN);dec sp;inc a;dec a;ld a,N;ccf;ld b,b;ld b,c;ld b,d;ld b,e;ld b,h;ld b,l;ld b,(hl);ld b,a;ld c,b;ld c,c;ld c,d;ld c,e;ld c,h;ld c,l;ld c,(hl);ld c,a;ld d,b;ld d,c;ld d,d;ld d,e;ld d,h;ld d,l;ld d,(hl);ld d,a;ld e,b;ld e,c;ld e,d;ld e,e;ld e,h;ld e,l;ld e,(hl);ld e,a;ld h,b;ld h,c;ld h,d;ld h,e;ld h,h;ld h,l;ld h,(hl);ld h,a;ld l,b;ld l,c;ld l,d;ld l,e;ld l,h;ld l,l;ld l,(hl);ld l,a;ld (hl),b;ld (hl),c;ld (hl),d;ld (hl),e;ld (hl),h;ld (hl),l;halt;ld (hl),a;ld a,b;ld a,c;ld a,d;ld a,e;ld a,h;ld a,l;ld a,(hl);ld a,a;add a,b;add a,c;add a,d;add a,e;add a,h;add a,l;add a,(hl
   1 n$+":ass.bin"
   1 n$+":ass.bas"
   1 n$+":"+g$:
   1 m$(i)="DRIVE"
   1 m$(h)="TAPE"
   1 m$(g)="CANCEL"
   1 m$(f)="INITIALISE"
   1 m$(e)="SAVE ROYBOT"
   1 m$(d)="LOAD CODE"
   1 m$(c)="DISASSEMBLE"
   1 m$(b)="TEST"
   1 m$(a)="STOP"
   1 l1;" - ";l2
   1 l$="Last line number"
   1 l$="    Enter letter"
   1 kval=ival+a
   1 kmPLUS3DOS
   1 k$=u$(kk):
   1 k$=" LETTER  FOR"
   1 j$="Input number, press ENTER"
   1 ival<45000
   1 ival<40950
   1 init=33531
   1 i;m$(kval):
   1 i,pp;"  ";
   1 i$=" "+i$+" ":
   1 hist=34515
   1 h$="ROYBOT MACHINE CODE SYSTEM"
   1 h$="From "
   1 g$="test.bin":
   1 fast=35654
   1 f$="test.bas":
   1 f$="First line number"
   1 f$;i$;m$(iv2+g);" ";
   1 es 7,(hl);res 7,a;set 0,b;set 0,c;set 0,d;set 0,e;set 0,h;set 0,l;set 0,(hl);set 0,a;set 1,b;set 1,c;set 1,d;set 1,e;set 1,h;set 1,l;set 1,(hl);set 1,a;set 2,b;set 2,c;set 2,d;set 2,e;set 2,h;set 2,l;set 2,(hl);set 2,a;set 3,b;set 3,c;set 3,d;set 3,e;set 3,h;set 3,l;set 3,(hl);set 3,a;set 4,b;set 4,c;set 4,d;set 4,e;set 4,h;set 4,l;set 4,(hl);set 4,a;set 5,b;set 5,c;set 5,d;set 5,e;set 5,h;set 5,l;set 5,(hl);set 5,a;set 6,b;set 6,c;set 6,d;set 6,e;set 6,h;set 6,l;set 6,(hl);set 6,a;set 7,b;set 7,c;set 7,d;set 7,e;set 7,h;set 7,l;set 7,(hl);set 7,a*in b,(c);out (c),b;sbc hl,bc;ld (NN),bc;neg;retn;im 0;ld i,a;in c,(c);out (c),c;adc hl,bc;ld bc,(NN);;reti;;ld r,a;in d,(c);out (c),d;sbc hl,de;ld (NN),de;;;im 1;ld a,i;in e,(c);out (c),e;adc hl,de;ld de,(NN);;;im 2;ld a,r;in h,(c);out (c),h;sbc hl,hl;ld (NN),hl;;;;rrd;in l,(c);out (c),l;adc hl,hl;ld hl,(NN);;;;rld;;;sbc hl,sp;ld (NN),sp;;;;;in a,(c);out (c),a;adc hl,sp;ld sp,(NN);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ldi;cpi;ini;outi;;;;;ldd;cpd;ind;outd;;;;;ldir;c
   1 endt=34382
   1 e$=t$(km):
   1 e$(e)="BACKTRACK "
   1 e$(d)="ERROR "
   1 e$(c)="BREAKPOINT"
   1 e$(b)="END"
   1 e$(a)="INVALID OP"
   1 d$="Use delete and separate save fornon ROYBOT lines"
   1 d$(a)=m$(kval)+b$(c):
   1 d$(a)=e$(e)+"-"+
   1 d$(a)=b$(i):
   1 d$(a)=b$(h):
   1 d$(a)=b$(g):
   1 d$(a)=b$(f):
   1 d$(a)=b$(b):
   1 cadd=ival:
   1 bttr=35079
   1 b2;c$(row,col-3
   1 b1;"     ";
   1 b$="Note deletes existing BASIC"
   1 b$(i)="Press ENTER, + other cancel"
   1 b$(h)="  Input drive number/letter"
   1 b$(g)="    Input file name"
   1 b$(f)="    Press ENTER"
   1 b$(e)="   Input number"
   1 b$(d)="Next just enter"
   1 b$(c)=" - input address"
   1 b$(b)="I/P register af bc de hl ix iy"
   1 b$(a)=" Input instruction or menu no."
   1 ad;" ";p$;c$:
   1 a;jval;" ";e$(bc):
   1 a;(d$(a));i$:
   1 a$="defw "+i$+
   1 a   f    ix     iy       sp                              1      bc      de      hl                                       2      szhpnc*]\
   1 ^(Track-Info
   1 TEST    BIN
   1 TEST    BAS
   1 EXTENDED CPC DSK File
   1 DISK       
   1 CPDRead v3.24
   1 ASS     BIN
   1 ASS     BAS
   1 ;t$(k);" ";k$:
   1 ;"   No illegal copying please    ":
   1 :Track-Info
   1 ,2Track-Info
   1 +a*in b,(c);out (c),b;sbc hl,bc;ld (NN),bc;neg;retn;im 0;ld i,a;in c,(c);out (c),c;adc hl,bc;ld bc,(NN);;reti;;ld r,a;in d,(c);out (c),d;sbc hl,de;ld (NN),de;;;im 1;ld a,i;in e,(c);out (c),e;adc hl,de;ld de,(NN);;;im 2;ld a,r;in h,(c);out (c),h;sbc hl,hl;ld (NN),hl;;;;rrd;in l,(c);out (c),l;adc hl,hl;ld hl,(NN);;;;rld;;;sbc hl,sp;ld (NN),sp;;;;;in a,(c);out (c),a;adc hl,sp;ld sp,(NN);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ldi;cpi;ini;outi;;;;;ldd;cpd;ind;outd;;;;;ldir;cpi
   1 )=h$+"tape"
   1 )=h$+"drive"
   1 )=h$+"RAM disk"
   1 )="length"
   1 )="WARNING too many input lines?"
   1 )="Start assembly"
   1 )="Start address"
   1 )="SAVE NEW CHARAS"
   1 )="ROYBOT code/BASIC"
   1 )="REFERENCE CHARA"
   1 )="RAM DISK"
   1 )="Press ENTER + other cancel"
   1 )="PRESS SPACE BAR"
   1 )="PASS 2"
   1 )="MM"Track-Info
   1 )="MERGE LINES"
   1 )="MENU SELECTION"
   1 )="MAIN MENU"
   1 )="List on assembly"
   1 )="Label addresses"
   1 )="LOAD TESTER"
   1 )="LOAD NEW"
   1 )="LOAD ASSEMBLER"
   1 )="INSERT REFERENCE"
   1 )="INITIALISE"
   1 )="FLAGS Off       On"
   1 )="ERASE FILE"
   1 )="Display"
   1 )="Delete above lines"
   1 )="DELETE"
   1 )="Continue assembly"
   1 )="Continue address"
   1 )="COPY SOFTWARE"
   1 )="CHARACTER DESIGN"
   1 )="CHANGE CHARA"
   1 )="CATALOG"
   1 )="CANCEL ALL"
   1 )="Assembled code"
   1 )="All BASIC lines"
   1 )="Address"
   1 )="ASSEMBLE"
   1 )=">44999 (40949)":
   1 )="8 Binary"
   1 )="7 Dec/Hex    15 Print      "+y$(2
   1 )="6 Backtrack  14 Step calls "+y$(1
   1 )="5 Run CLS    13 Real addr. "+y$(1
   1 )="4 Run fast   12 Memory MM  "+
   1 )="3 Run slow   11 Breakpoint "+
   1 )="2 Step       10 End  addr. "+
   1 )="1 Exit        9 Start addr."+
   1 )=" Input number, press ENTER"
   1 )=" Enter drive letter or number":
   1 )=" 1 "+u$(1
   1 )="  or ROYBOT BASIC"
   1 )="  Use >< etc. to move X cursor"
   1 )="  Press space bar for paper"
   1 )="   Enter file name"
   1 )="   "+t$(k)
   1 )="     MENU SELECTION"
   1 )="        other letter for ink"
   1 )="        Press ENTER"
   1 )="        ENTER to end"
   1 );" a   bc    de    hl    ix    iy    ";s$(251
   1 );" ";s$(67
   1 );" ";s$(19
   1 );"  ";s$(287
   1 )+" 3 "+u$(3
   1 )+" "+u$(9
   1 )+" "+b$(d):
   1 )+ " 2 "+ u$(2
   1 "t:test.bin"
   1 "t:ass.bas" :
   1 "t:ass.bas"
   1 "m:test.bin"
   1 "m:ass.bas"
   1 "a:test.bin"
   1 "a:test.bas"
   1 "Rewind to verify":
   1 "A:test.bin"
   1 "A:test.bas"
   1 "A:ass.bin"
   1 "A:ass.bas"
   1 "                      ";s$(161
   1  n$+":"+g$
   1  !"#$%&'()
   1                nop            S